Top 10k strings from Spectraxx - Issue 12 (1988)(Spectraxx Tape Magazine)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

  14                               !
   7 PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPQ
   3                                                                                                                                 
   2 "WINDSCREEN"
   1 window width
   1 window depth
   1 headreaderz
   1 f~<``n|x|n
   1 dbcode    v
   1 a$=a$+"win2:- the depth of the window  in characters                   row & col:- these are like the  co-ords used in a print AT      statement.   They give the      position of the top left corner of the window.                                                  "
   1 a$=a$+" The text is put into ~a$~ and canbe up to 4000    characters long, although I found in practise that was a bit long.                   "
   1 a$="Well thatsabout it.           If you    want to   know any  more than drop me a line and  ask!!!    ":
   1 a$="To activate the code you        RANDOMIZE or whatever USR 60000                                 To get the paper and ink colourssimply use PAPER and INK        commands without CLS. The prog  takes the infomation from the   systems variable 23693 and POKESthe window with the relevant    numbers.                        "
   1 a$="This is a demo for the   window program that I've written. Its nothing thatfancy, but I like it....."
   1 a$="There are 4variables  to set up  to give thesize and   location ofeach window           "
   1 a$="The code for thisprogram sits at  60000 and is 701 bytes long.      The memory after the program is   used as a buffer for the text you want to print.                                     "
   1 a$="Press Any Key...................":
   1 a$="I suppose that you    want me to tell you a bit about how to use  it don't you?  WELL???":
   1 a$="Bein' as I know yer                                             Bein' as I know yer I said      ":
   1 a$=" As this program was written to be ~RUN~ from Basic the         variables are entered in the    form LET row=0 etc etc.                                         It is most important that the   variable a$ is at least one     character long and it is a good idea to define a$ as the first  string in memory.               The other variables used are as follows:-                       win1:- the width of the window  in characters                   "
   1 a$="                                           WOW!                                     ":
   1 YOU NEED THIS POKE TO PREVENT A CRASH!!!
   1 WINDSCREEN
   1 WINDOWCODE
   1 WINDOW    Q
   1 WARM OR COLD START?  W/C
   1 Start Tape
   1 Start Address
   1 Spectraxx Tape Magazine
   1 SPECTRAXX TAPE MAGAZINE         IS THE BEST AROUND!!!           BUY THREE COPIES OF EVERY       ISSUE OR BE A NERD!             PROGRAM BY BOB SMITH            WHAT A SWOT!                    I'M DEPRESSED NOW!              Q: WHO LIKES BEN ELTON,JASPER      CARROTT,BLACKADDER II,          RED DWARF,THE PINK PANTHER      SHOW,WHERE TIME STOOD STILL,    HACKING,WRITING SILLY MESSAGE   FILES AND GENERALLY MESSING     ABOUT A LOT?                 A: THE EDITOR OF SPECTRAXX!!!                                   THIS IS A BLANK FILE^^^^^       WATCH WHAT HAPPENS TO IT WHEN   YOU USE THE SORT OPTION!        CLEVER,EH?                      COME ON BOB,SEND US A LOT MORE  STUFF AND WE WON'T TELL THEM    ABOUT YOUR SENSE OF HUMOUR!!!   NEXT MONTHS REVIEWS INCLUDE -   VIRUS                           MICKEY MOUSE                    ROAD BLASTERS                   THE GREAT GIANA SISTERS         AND MORE!                       ON SALE FROM THE 5TH OF SEPT.   PRICED `1.00! IT'S A SNIP!      IT'S OUR FIRST BIRTHDAY ISSUE!
   1 SORTING! PLEASE WAIT!
   1 REPLACE/FIND NAME
   1 Press Any Key...................o
   1 PLEASE ENTER NEW NAME.
   1 PLEASE ENTER NAME.
   1 PLEASE ENTER A FILENAME.
   1 NAME NOT FOUND. PRESS ANY KEY.
   1 NAME EXISTS. REPLACE NAME? Y/N
   1 Lee Tonks + team
   1 LEAVE TAPE RUNNING!
   1 INPUT LETTER 
   1 I HAVEN'T PUT A VECTOR TABLE    INTO THE ROUTINE SO A           KEMPSTON JOYSTICK INTERFACE OR  INTERFACE ONE ETC MIGHT CAUSE   THIS TO CRASH!
   1 HEADREADER
   1 FONTS     
   1 FILE FULL. Press any key.
   1 ERASE FILE! ARE YOU SURE? Y/N
   1 END OF FILE
   1 EMPTY FILE!     PRESS ANY KEY.
   1 Database  
   1 DEMO      
   1 DELETE LINES 30 TO 9998 THEN AMEND THE SAVE LINE (9999) SO THAT THE PROGRAM RUNS FROM    LINE 20
   1 CHANGE THE SAVE ROUTINE TO 
   1 Basic Program 
   1 ;"STOP THE TAPE!!!!!":
   1 ;"START ~TAU CETI~ TAPE"
   1 ;"START ~STORMBRINGER 128~ TAPE":
   1 ;"START ~ALIENS~ TAPE"
   1 ;"START THE TAPE":
   1 ;"RUN THE TAPE AND PRESS ANY KEY"
   1 ;"Press any key for database":
   1 ;"PROGRAM SPECIAL!"
   1 ;"If anyone wants to follow Bob's example and send in some stuff  for us to use,a free copy of themagazine goes to the submitter  for every month that a program  is used! Send anything you want us to see on cassette to the    normal address. Thanks!         "
   1 ;"All of the programs that follow were written by Spectraxx       reader,Bob Smith. We liked them,and we hope that you will too!  You'll be hearing more of Bob   soon,as we still have some of   his stuff left! Each program    will load and run itself,but    please reset between each one.  Also,it may be a good idea for  128 owners to select 48k basic. "
   1 ;"        LOADING PROGRAMS        ":
   1 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::MMMMMMMMMMMMMMMMMMMMMMMM::::::::MMMMMMMMMMMMMMMMMMMMMMMM::::::::MMMMMMMMMMMMMMMMMMMMMMMM::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqxxqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqxxuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuxxuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuxxppppppppppppppppppppppppppppppxxppppppppppppppppppppppppppppppxxrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrxxrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
   1 8. DISPLAY FROM LETTER.
   1 7. ERASE FILE.
   1 6. SORT FILES ALPHABETICALLY.
   1 5. DISPLAY ALL NAMES.
   1 4. FIND/REPLACE A NAME.
   1 39936 to switch ONRANDOMIZE USR 39943 for OFF":
   1 3. ENTER A NAME.
   1 2. SAVE A FILE.
   1 1. LOAD A FILE.
   1 0. TO RETURN TO BASIC.
   1 (Spectraxx Issue 12, Side B - August 1988
   1 (ENTER=erase)
   1 ''"Press R to run headreader"''"Press Q to quit and load next   program."
   1 ''"It is interrupt driven and as"'"the prog is so small it does not"'"slow down the running of your"'"Basic......"
   1 '"Reset your computer before      loading in the next program...."
   1 '"RANDOMIZE USR 
   1 "headreader"
   1 "What about this then. Hit a key!":
   1 "WINDOWCODE"
   1 "This program can be put anywhere"'"Providing that you change the"'"numbers to point to the new"'"address."
   1 "This is just a headreader       program. Its all in machine codeIt will read the header of any  program for you."''"Use BREAK to get back to basic."
   1 "This is a simple database that Iuse to store my programs list on"''"I hope the menu explaines it alllook at the listings to amend   the basic bit and chop out all  this rabbit."
   1 "There is a demo file next on thetape so as you can see how it   all works. Each entry can be up to 32 characters long. You can  have 1246 files in memory max."'"The sort routine is a bit slow  when you have a lot of files to sort."
   1 "It takes aprox .25 of a second  per file to sort. So 1000 files takes about 3 minutes."'"If you drop back to Basic (key0)use Warm start to prevent your  current file from being erased. Cold start erases the file."
   1 "HEADREADER"
   1 "Database"
   1 "And that's all there is to it!  It's simple to use,and if you   need to save it out again,there are the relevant instructions atthe end of the program! Ed."'''"Don't forget to reset before    LOADing the next program!"
   1 "6";"START ~DENIZEN~ TAPE"
   1 "0";"START ~BEYOND - ICE PALACE~ TAPE"
   1  Press any key.
   1  FOR MENU.
   1  AND ERASE LINES 30  TO 9
   1                                 
   1            
   1